Top 10k strings from MicroHobby Semanal - Issue 021-024 (1985)(Hobby Press)(es)(Side B).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
17
6 ;"PARE LA CINTA":
3 ;xb;",";yb
3 ;"XXXXXXXXXX"
3 ;"PULSE UNA TECLA PARA CONTINUAR":
3 ;"APUESTAS ";AP;"$";
3 ;" NO LO VEO ":
3 "HORIZONTAL-h O VERTICAL-v";z$:
3
3
2 x0+scx*a(i)-1
2 x(i)=a(i):
2 t$=" algun "
2 sx=sx-apx:
2 sv,sh;" ";
2 p;" "
2 b(x)>b(x+1
2 b(x)=y(x):
2 b(x)=b(x+1
2 Y(X)=B(X):
2 X(X)=B(X):
2 SY=SY-APX:
2 S$="* % ALUMNOS *"
2 K,L;M$(O);
2 C(A)=C(A)-P(A)
2 C(A)=C(A)+P(A)
2 B(X)=X(X):
2 ;EN;" TN.";
2 ;"TIENES ";SX;"$ ";
2 ;"TENGO ";SY;"$ ";
2 ;"PUNTOS=";" ";
2 ;"PIERDES":
2 ;"APUESTA ";ap;" "
2 ;"***********";
2 ;" "
2 ;" ";
2 ;" ":
2 ;" ":
2 ;" ":
2 (NPROG/DOS)
2 "NUMERO DE ALUMNOS DEL CURSO ";AC:
2 "HORIZONTAL-h O VERTICAL-v";k$:
2 "CURSO? (menos de 12 letras)";
2 "APUESTA ?",APX
2 "22",CERO;B$:
2 ":
2
1 y0+scy*ymin<1
1 y0+scy*ymax>174
1 xxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzzzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxzxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzxzzzzzzzzzzzzzzzzxxxxxxxxxzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzz 8888888888888888888888888888888888888888888888888888888888888888
1 xp=xp+i(i):
1 xp=p+i(i):
1 x0+scx*xmin<1
1 x0+scx*xmax>254
1 t(fc+mc)=xp:
1 t$=" otro ":
1 sy=sy-apy:
1 sumy=sumy+y(i):
1 sumxy=sumxy+x(i)*y(i):
1 sumx=sumx+x(i):
1 sumx2=sumx2+x(i)*x(i):
1 sumatorio x^2
1 sumatorio de x
1 scy=scy/1.5
1 scx=scx/1.5
1 s(z)=s(z)+1
1 record=par+punt
1 puntu=3000
1 punt=punt+1
1 punt+par<record
1 par=par+10
1 n=n*scx+x0:
1 n;"RECORDMAN":
1 n$="RECORD"
1 muerto=4000
1 micro
1 m=m*scx+x0:
1 i$=" potencial"
1 i$=" logaritmica"
1 i$=" lineal"
1 i$=" exponencial"
1 f((x-x0)/scx)+y0:
1 f$=a$+"+"+b$+"*
1 f$=a$+"*"+"x^"+b$
1 f$=a$+"*"+"
1 f$=" "+a$+"+"+b$+"*x"
1 expresion de la curva
1 dibujo de graficas
1 definicion de funciones
1 cargador f
1 can=can+.5
1 camilla=110
1 calculo x(i),y(i) segun el tipo de regresion
1 calculo sumatorio x*y
1 calculo de sumatorios
1 calculo de sumatorio de y
1 calculo de coeficientes
1 b=(n*sumxy-sumx*sumy)/(n*sumx2-sumx*sumx)
1 b(t(f))=t+1
1 apy=apy-apx:
1 ap=ap+apy:
1 ap=ap+apx:
1 ajuste de escala
1 a=(sumy-b*sumx)/n
1 a(B)=a(B+1
1 a$=" 23456789
1 VERIFICANDO
1 UNO;"PONGA EN MARCHA LA CINTA";
1 TZX por Jose Manuel Claros
1 Suicida
1 SietemediaV
1 SUBRUTINA MOVIMIENTO
1 SUBMARINO-II
1 SUBMARINE ATTACK
1 SPACE-UNO,X1
1 SPACE-UNO,CERO:
1 SPACE,LINEA:
1 SPACE,CERO:
1 SP,R;a$(b);" Y ";a$(c):
1 SP,R;a$(b)
1 SIN ENERGIA
1 SE ACABO EL JUEGO LA BANCA LO PERDIO TODO.RUN OTRO JUEGO":
1 S$="PROGRAMA NOTAS"
1 Regresion #
1 RUTINA POSICION NAVES
1 RESULTADOS
1 Poker
1 PULSE S PARA SEGUIR,P PARAR
1 POSICION NAVES
1 PANTALLA EN BLANCO
1 PANEL SUBMARINO
1 P(I)>100000
1 Otelo
1 OTHELLO -1985
1 MOVIMIENTO SUBMARINO
1 MOVIMIENTO DESTRUCTOR
1 M.S.D. 10/3/84
1 Instrucciones
1 INTRODUZCA EL NUMERO DE JUGADORES HASTA 10 MAX.
1 INTRODUZCA EL NOMBRE N
1 INICIALIZA
1 I,CERO;,,:
1 Hobby Press
1 Gsubmarina
1 EL ORDENADOR ES BANCA";
1 DOS=UNO+UNO
1 DISPARO SUBMARINO
1 DISPARO DESTRUCTOR
1 DIBUJO DE CIRCUITOS ELECTRICOS.V.S.-1985.
1 DATOS JUEGO
1 D(I)=D(I)+V(O)
1 Colegios
1 Circuitos
1 Castellano
1 CONTROL DISPARO DESTR.
1 COMPROBACION
1 CINTA 06 CARA B
1 CERO;" ";
1 CARAB *
1 C$=" Por favor, elija un programa "
1 C CARTAS P PLANTARSE
1 BY M.SAGUER
1 B(X)=Y(X):
1 B$=" "
1 APX=APX-APY
1 AP=ap+APX:
1 AP=AP+APX:
1 A(Z)=X*100
1 A$="En la pantalla aparecen los con-troles,radar,... En la zona in-ferior del display el ordenador de a bordo te pedira los movi- mientos para un final feliz!"
1 A$="En este juego te encuentras en un mar hostil a bordo de un sub-marino. Un destructor intentara destruirte si no lo hundes tu antes."
1 ="L")-(378
1 ;a$(b);"-";a$(c):
1 ;M;" grados"
1 ;D;" cuadr.";
1 ;"tiro errado "
1 ;"rumbo-grados=?";
1 ;"orientacion disparo:"
1 ;"f(";x;") = ";
1 ;"cual? "
1 ;"YA NO PODEMOS..."
1 ;"XXXXXXXX"
1 ;"VERIFICANDO..."
1 ;"TOCADOS...SIN SALVAMENTO"
1 ;"TOCADO!,DESTRUCTOR CON DANOS":
1 ;"TECLAS CURSOR PARA MOVIMIENTO."
1 ;"TE HAS PASADO";
1 ;"TABLAS! QUIERES DESEMPATAR ?...":
1 ;"STOP THE TAPE";
1 ;"SIN ENERGIA!":
1 ;"SE JUEGA CON BARAJA ESPA
1 ;"S U S P E N S O S":
1 ;"Regresion";i$
1 ;"Que tipo de curva deseas?"
1 ;"QUIERES";
1 ;"QUIERES GRABAR LA PANTALLA (s/n)?";w$
1 ;"Pulse una tecla para continuar"
1 ;"Pulse la tecla correspondiente"
1 ;"Press any key to continue"
1 ;"Por favor teclea tu nombre "
1 ;"PULSE CUALQUIER TECLA."
1 ;"PULSAR TECLA PARA SEGUIR"
1 ;"PULSA UNA TECLA":
1 ;"PRIMERO CATODO (c) o ANODO (a) ";k$:
1 ;"PASAN ":
1 ;"P-CAMBIAR COORDENADAS DIBUJO. M-MODIFICA DIBUJO. N-NO DIBUJA. N-DIBUJA. G-SALVAR PANTALLA. E-ESCRIBIR (0-TEXTO). X-MENU."
1 ;"Otra partida s/n ?"
1 ;"O T H E L L O"
1 ;"No hay torpedos!":
1 ;"NOMBRE PTOS. DINERO RESULTADO"
1 ;"NO ES POSIBLE.PRUEBE OTRO..":
1 ;"NADA ";:
1 ;"N O T A S":
1 ;"MUEVEN";
1 ;"MOV. rumbo= ";L$
1 ;"ME PLANTO";
1 ;"ME HE PASADO";
1 ;"JUGADOR ";I;"
1 ;"JUEGAN";
1 ;"INTRODUZCA EL DINERO QUE TIENE LA BANCA":
1 ;"INSTUCCIONES"
1 ;"INSTRUC-";
1 ;"He PERDIDO":
1 ;"HAS PERDIDO":
1 ;"GRAFICO DE CURSOS":
1 ;"GRAFICO DE CURSOS (C)"
1 ;"GRAFICO DE ASIGNATURAS":
1 ;"GRAFICO DE ASIGNATURAS (A)"
1 ;"GRAFICA DE LA CURVA"
1 ;"GANAN ";
1 ;"ERROR!";
1 ;"Desea otro grafico S/N"
1 ;"DISPARO"
1 ;"DESTRUCTOR HUNDIDO!"
1 ;"DEMOSTRACION"
1 ;"Cuantos puntos tiene la nube de datos";
1 ;"Calculo de regresiones. Ajuste de curvas lineales, logaritmicas,exponenciales y potenciales"
1 ;"CON ESTE PROGRAMA PODRAS DIBUJAR CIRCUITOS ELECTRICOS CON SEMICONDUCCTORES."
1 ;"CIONES";
1 ;"CAMBIO ";S;" ":
1 ;"C-R-T-D-I-S-B-F-P-M-N-G-E-X=MENU (5-6-7-8)"
1 ;"C-Condensadores R-Resistencias T-Transistores (pnp)-(npn) D-Diodos I-Bobinas S-Contactos Reles B-Baterias F-Reles "
1 ;"APUESTA=";P(I)
1 ;"AHORA ES EL TURNO DE LA BANCA"
1 ;"A B C D E F G H"
1 ;">";TO;" u "
1 ;">";TO;" u ":
1 ;"1.-Regresion lineal 2.-Regresion logaritmica 3.-Regresion exponencial 4.-Regresion potencial"
1 ;"--COMPONENTES--"
1 ;"****************************************************************************************************************"
1 ;"(5-6-7-8-0)":
1 ;" RUNNING "
1 ;" PUEDES MOVER A ";
1 ;" MD IN SU BI NO SO ":
1 ;" JUEGO DEL SIETE Y MEDIO ";
1 ;" JUEGO DE OTHELLO "
1 ;" 0 1 2 3 +3 ":
1 ;" ";APX;" Y ";APY-APX;" MAS "
1 ;" UN MINUTO ":
1 ;" PULSAR TECLA ":
1 ;" PULSA TECLA ":
1 ;" PUEDES JUGAR CONTRA UN AMIGO ",," , CONTRA EL ORDENADOR,O VER ",," DEMOSTRACION. ",," EL JUEGO CONSISTE EN DEJAR ",,," EL MAYOR NUMERO DE FICHAS DE ",," TU COLOR. ",," PARA MOVER TIENES QUE PASAR ",," POR ENCIMA DE UNA FICHA DE OTRO",," COLOR.(es obligado comer) ",," PULSAR ENTER PARA PASAR. "
1 ;" PARE LA CINTA ":
1 ;" M E N U "
1 ;" CIRCUITOS ELECTRICOS "
1 ;" APUESTAS ":
1 ;" APUESTAS ":
1 ;" LO VEO ":
1 ;" LO VEO ":
1 ;" CAMBIA "
1 ;" CALCULO DE CURVAS DE REGRESION"
1 ;" ";
1 ;" "
1 ;" "
1 ;" ";
1 ;" "
1 ;" ";
1 ;" ":
1 ;" ";
1 ;" "
1 ;" ":
1 1;" X ";
1 19;" Y "
1 ......... ....~~~~~~~~~~.........
1 -movimiento";
1 -disparar"
1 -TERMINAR"
1 -CONTINUAR
1 ,y0+scy*b(i)-1
1 ,y0+scy*b(i)+1
1 ,sh;" ";
1 ,sh;" ":
1 ,D.L.: M-36598-84
1 *xe)+ye)),v
1 *xb)+yb)),v:
1 *xb)+yb)),v+64
1 *** CINTA-MICROHOBBY ***
1 * RADAR * SUBMARINO CONTROL
1 )="TRIO DE":
1 )="POKER DE":
1 )="PAREJA DE":
1 )="NEGRAS ":
1 )="FULL DE":
1 )="FIGURAS ":
1 )="ESCALERA-COLOR AL"
1 )="ESCALERA AL":
1 )="DOBLE-PAREJA ":
1 )="COLOR ":
1 )="BLANCAS ":
1 );s$(z);" ";s(z);" ":
1 (VALOR)<"A"
1 (((O-K)*(O-K))+((LL-E)*(LL-E))))
1 (((H-O)*(H-O))+((V-E)*(V-E))))
1 ("+b$+"*x)"
1 "x=";x,"f(x)=";
1 "x(";(i);")= ";a(i),"y(";(i);")= ";b(i)
1 "norte","nordeste","este","sudeste","sur","suroeste","oeste","noroeste","norte"
1 "f(x)=";f$
1 "Vas a usar impresora ";
1 "VARIABLE (s/n)";z$:
1 "VARIABLE (S/n)";z$:
1 "TU OBJETIVO COMO BUEN CAMILLERO QUE ERES ES RESCATAR AL MAXIMO NUMERO DE HOMBRES"
1 "TRANSISTOR pnp O npn (n/p)";z$:
1 "TEXTO ";d$
1 "TE ATREVES A CORRER ESE RIESGO?":
1 "RESULTADOS:":
1 "Que valor deseas x= ";x
1 "QUIERES MODIFICAR MAS (s/n)";q$
1 "QUE NOMBRE QUIERES ?";n$
1 "PULSA UNA TECLA PARA COMENZAR EL JUEGO"
1 "PUEDES MOVERTE HACIA LOS LADOS CON LAS TECLAS O & P (IZQUIERDA Y DERECHA RESPECTIVAMENTE)"
1 "PRIMERO EL POSITIVO O NEGATIVO (p/n)";z$:
1 "PRIMERO ,POSITIVO O NEGATIVO (p/n)";k$:
1 "POSICION INICIAL: Y-";y
1 "POSICION INICIAL: X- ";x
1 "PAPEL= ";p," TINTA= ";i:
1 "OTRA PARTIDA ? ";a$:
1 "No puedo trabajar con negativos Introduce valores positivos":
1 "No existen logaritmos de numerosnegativo.Introduce un valor apropiado":
1 "No existen exponenciales negativos.Introduce un valor apropiado":
1 "MicroHobby Semanal numeros 21 a 24
1 "MUEVES PRIMERO ?(S,N) ";
1 "La curva de regresion ";i$;" es:"
1 "Introduce los puntos por parejas":
1 "HORIZONTAL-h O VERTICAL-v?";k$:
1 "HORIZONTAL-h O VERTICAL-v ?";k$:
1 "ELECTROLITICO (s/n)";z$:
1 "E-Suicida","F-Colegios","G-Gsubmarina","H-Regresion"
1 "Deseas obtener";(t$);"valor de regresion? ";
1 "Deseas hacer otra?";
1 "DESEAS VER LAS REGLAS (S/N) ";r$
1 "DATOS DE ENTRADA":
1 "Curva de regresion";i$:
1 "Calculo de regresion ";i$
1 "CUANTOS JUGADORES ?(1,2) Demostracion(3) ";j:
1 "COORDENADAS - ";
1 "CALCULO DE VALORES DE REGRESION":
1 "ASIGNATURA? (menos de 10 letras)";
1 "ALUMNOS CON SUFICIENTE ";N:
1 "ALUMNOS CON SOBRESALIENTE ";N:
1 "ALUMNOS CON NOTABLE ";N:
1 "ALUMNOS CON MUY DEFICIENTE ";N:
1 "ALUMNOS CON MAS DE 3 SUSPENSOS ";N:
1 "ALUMNOS CON BIEN ";N:
1 "ALUMNOS CON 3 SUSPENSOS ";N:
1 "ALUMNOS CON 2 SUSPENSOS ";N:
1 "ALUMNOS CON 1 SUSPENSO ";N:
1 "ALUMNOS CON 0 SUSPENSOS ";N:
1 "ALUMNOS CON INSUFICIENTE ";N:
1 "AL= ","MD= ","IN= ","SU= ","BI= ","NO= ","SO= "
1 "AL= "," 0= "," 1= "," 2= "," 3= ","+3= "
1 "A-Otelo","B-Poker","C-Sietemedia","D-Circuitos"
1 "A PARTIR DE QUE CARTA",CARD:
1 "64"+NPROG)
1 "5";"cara: ";
1 "5";"Programa: ";
1 "5";"Programa inexistente":
1 "5";"'R' Vuelve al menu"
1 "5";"'L' Carga el programa";
1 "32"-I;C$(
1 "22",CERO;C$(I
1 "22",CERO;B$
1 "22",CERO;
1 "--------------------------------":
1 "(5-6-7-8)";b$
1 " f(x)= ";f$
1 " SUICIDAS ES UN JUEGO DE RESCATE"
1 " COORDENADA Y =";y
1 " COORDENADA X =";x
1 " x(i)","| y(i)":
1 " SE BORRARA EL PROGRAMA."
1 " DENTRO DE 10 SEGUNDOS....":
1 " ";a(i),"| ";b(i)
1 " SI SE PASA DEL 7.5 LA CANTI- DAD DE LA APUESTA PASA A LA BANCA."
1 " LA BANCA JUEGA SOLA."
1 " EL VALOR DE CADA NAIPE ES EL QUE INDICA ,ESCEPTO EL 10 ,11 Y 12 QUE SU VALOR ES MEDIO PUNTO."
1 " EL JUEGO TRATA DE QUE EL JU- GADOR TIENE QUE SUPERAR A LA BANCA, SI NO PIERDE LA CANTIDAD APOSTADA,LA CUAL SE LLEVA LA BANCA."
1 " ACEPTA HASTA 11 JUGADORES, UNO DE ELLOS ES LA BANCA."
1 " Pulsa opcion deseada"
1 by Jose M. Albarran":
1 TORPEDOS
1 SUBMARINE ATTACK
1 RUMBO SUB.
1 RICARDO GOMEZ 1984
1 MARTIN SAGUER DIAZ
1 MARTI-84":
1 JUAN MONTOYA MOYANO"
1 DISTANCIA
1 ENERGIA
1 ALARMA
1 M-84
1 RADAR
1
1